Nuprl Lemma : sumdeq_wf
11,40
postcript
pdf
A
,
B
:Type,
a
:EqDecider(
A
),
b
:EqDecider(
B
). sumdeq(
a
;
b
)
(
A
+
B
)
(
A
+
B
)
latex
Definitions
x
:
A
.
B
(
x
)
,
EqDecider(
T
)
,
t
T
,
sumdeq(
a
;
b
)
,
P
Q
,
x
.
t
(
x
)
,
prop{i:l}
,
P
Q
,
P
Q
,
P
Q
,
x
(
s
)
Lemmas
pi1
wf
,
bool
wf
,
iff
wf
,
assert
wf
,
bfalse
wf
origin
A,B:Type, a:EqDecider(A), b:EqDecider(B). sumdeq(a; b) 
(A + B)
(A + B)
A,B:Type, a:EqDecider(A), b:EqDecider(B). sumdeq(a; b) (A + B)(A + B) x:A. B(x) T
Q
x. t(x)
Q Q Q